unit UFormQuestionX;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,StrUtils,
  Dialogs, Menus, ComCtrls, ExtCtrls, jpeg, StdCtrls, UDM, UUsuario;

type
  TFormQuestion = class(TForm)
    LblTitulo: TLabel;
    LblQuestion: TLabel;
    EdtRespostaUser: TEdit;
    BtnProcessar: TButton;

    private
      FPergunta: String;

    protected

    public
      constructor Create(Titulo, Pergunta: String);
  end;

implementation
{ TFormQuestion }

constructor TFormQuestion.Create(Titulo, Pergunta: String);
begin
  LblTitulo := TLabel.Create(Self);
  LblTitulo.Caption := Titulo;
  LblTitulo.Top := 10;
  LblTitulo.Left := 10;

  LblQuestion := TLabel.Create(Self);
  LblQuestion.Caption := Pergunta;
  LblQuestion.Top := 30;
  LblQuestion.Left := 10;

  EdtRespostaUser := TEdit.Create(Self);
  EdtRespostaUser.Top := 60;
  EdtRespostaUser.Left := 10;

  BtnProcessar := TButton.Create(Self);
  BtnProcessar.Top := 100;
  BtnProcessar.Left := 10;

  Height := 300;
  Width := 200;
  Caption := 'Lembrando sua Senha';

end;

end.
 